0 PRINT"[147]":POKE53280,0:POKE53281,0:POKE646,1
1 REM COMMODARES PROBLEM #35-3:
2 REM     TIME CONVERTER
3 REM SOLUTION BY
4 REM     HOWARD  G. REISER
5 REM
10 INPUT"NUMBER OF HOURS IN DECIMAL FORM";HX
20 H$=STR$(INT(HX))
30 S=3600*(HX-INT(HX))+.5
40 M=INT(S)/60:M$=" :"+STR$(INT(M))
50 S$=" :"+STR$(INT((M-INT(M))*60+.5))
60 PRINT HX;" HOURS = ";H$;M$;S$